home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tricks of the Mac Game Programming Gurus
/
TricksOfTheMacGameProgrammingGurus.iso
/
More Source
/
Libraries
/
SAT 2.3b4
/
Demo ƒ
/
Zkrolly demo ƒ
/
sXprite.c
next >
Wrap
Text File
|
1994-08-21
|
637b
|
47 lines
//• C translation from Pascal source file: sXprite.p
//• sXprite;
//• Prototypes, etc.
#include "SAT.h"
FacePtr Xface;
void InitXprite(void);
pascal void SetupXprite(SpritePtr me);
pascal void HandleXprite(SpritePtr me);
enum {
xpeed = 2
};
void InitXprite()
{
Xface = SATGetFace(130);
}
pascal void SetupXprite(SpritePtr me)
{
me->speed.h = xpeed;
me->face = Xface;
me->task = &HandleXprite;
}
pascal void HandleXprite(SpritePtr me)
{
me->position.h = me->position.h + me->speed.h;
if (me->position.h > gSAT.offSizeH )
{
me->speed.h = -xpeed;
}
if (me->position.h < -20 )
{
me->speed.h = xpeed;
}
}